home *** CD-ROM | disk | FTP | other *** search
/ CD Ware Multimedia 1995 May / cd Ware (Juegos) Epimundo.iso / WIN / VB_TOOLS / FRMT_VB.ZIP / FORMATVB.GLB < prev    next >
Encoding:
Text File  |  1992-12-09  |  9.7 KB  |  234 lines
  1. '============================================================================
  2. ' Partial List of Global Variables used by Larry Rebich
  3. ' extracted from the VB constant.txt file.
  4. ' Not all of these are used in FormatVB.Frm
  5. '=================='
  6. ' Event parameters '
  7. '=================='
  8. ' Button and Shift (KeyDown, KeyUp, MouseDown, MouseMove, MouseUp)
  9. Global Const CTRL_MASK = 2
  10. Global Const ALT_MASK = 4
  11.  
  12. ' KeyCode (KeyDown, KeyUp)
  13. Global Const KEY_PRIOR = &H21          'PageUp
  14. Global Const KEY_NEXT = &H22           'PageDown
  15. Global Const KEY_UP = &H26
  16. Global Const KEY_DOWN = &H28
  17. Global Const KEY_DELETE = &H2E
  18. Global Const KEY_F10 = &H79
  19.  
  20. '====================='
  21. ' Function parameters '
  22. '====================='
  23.  
  24. ' MsgBox parameters
  25. Global Const MB_OK = 0                 ' OK button only
  26. Global Const MB_OKCANCEL = 1           ' OK and Cancel buttons
  27. Global Const MB_ABORTRETRYIGNORE = 2   ' Abort, Retry, and Ignore buttons
  28. Global Const MB_YESNOCANCEL = 3        ' Yes, No, and Cancel buttons
  29. Global Const MB_YESNO = 4              ' Yes and No buttons
  30. Global Const MB_RETRYCANCEL = 5        ' Retry and Cancel buttons
  31.  
  32. Global Const MB_ICONSTOP = 16          ' Critical message
  33. Global Const MB_ICONQUESTION = 32      ' Warning query
  34. Global Const MB_ICONEXCLAMATION = 48   ' Warning message
  35. Global Const MB_ICONINFORMATION = 64   ' Information message
  36.  
  37. Global Const MB_DEFBUTTON1 = 0         ' First button is default
  38. Global Const MB_DEFBUTTON2 = 256       ' Second button is default
  39. Global Const MB_DEFBUTTON3 = 512       ' Third button is default
  40.  
  41. ' MsgBox return values
  42. Global Const IDOK = 1                  ' OK button pressed
  43. Global Const IDCANCEL = 2              ' Cancel button pressed
  44. Global Const IDABORT = 3               ' Abort button pressed
  45. Global Const IDRETRY = 4               ' Retry button pressed
  46. Global Const IDIGNORE = 5              ' Ignore button pressed
  47. Global Const IDYES = 6                 ' Yes button pressed
  48. Global Const IDNO = 7                  ' No button pressed
  49.  
  50. ' Show (form)
  51. Global Const MODAL = 1
  52. Global Const MODELESS = 0
  53.  
  54. '================='
  55. ' Property values '
  56. '================='
  57. ' Alignment (label)
  58. Global Const LEFT_JUSTIFY = 0          ' 0 - Left Justify
  59. Global Const RIGHT_JUSTIFY = 1         ' 1 - Right Justify
  60. Global Const CENTER = 2                ' 2 - Center
  61.  
  62. ' BackColor, ForeColor, FillColor (standard RGB colors: form, controls)
  63. Global Const BLACK = &H0&
  64. Global Const RED = &HFF&
  65. Global Const GREEN = &HFF00&
  66. Global Const YELLOW = &HFFFF&
  67. Global Const BLUE = &HFF0000
  68. Global Const MAGENTA = &HFF00FF
  69. Global Const CYAN = &HFFFF00
  70. Global Const WHITE = &HFFFFFF
  71.  
  72. ' BackColor, ForeColor, FillColor (system colors: form, controls)
  73. Global Const SCROLL_BARS = &H80000000           ' Scroll-bars gray area.
  74. Global Const DESKTOP = &H80000001               ' Desktop.
  75. Global Const ACTIVE_TITLE_BAR = &H80000002      ' Active window caption.
  76. Global Const INACTIVE_TITLE_BAR = &H80000003    ' Inactive window caption.
  77. Global Const MENU_BAR = &H80000004              ' Menu background.
  78. Global Const WINDOW_BACKGROUND = &H80000005     ' Window background.
  79. Global Const WINDOW_FRAME = &H80000006          ' Window frame.
  80. Global Const MENU_TEXT = &H80000007             ' Text in menus.
  81. Global Const WINDOW_TEXT = &H80000008           ' Text in windows.
  82. Global Const TITLE_BAR_TEXT = &H80000009        ' Text in caption, size box, scroll-bar arrow box..
  83. Global Const ACTIVE_BORDER = &H8000000A         ' Active window border.
  84. Global Const INACTIVE_BORDER = &H8000000B       ' Inactive window border.
  85. Global Const APPLICATION_WORKSPACE = &H8000000C ' Background color of multiple document interface (MDI) applications.
  86. Global Const Highlight = &H8000000D             ' Items selected item in a control.
  87. Global Const HIGHLIGHT_TEXT = &H8000000E        ' Text of item selected in a control.
  88. Global Const BUTTON_FACE = &H8000000F           ' Face shading on command buttons.
  89. Global Const BUTTON_SHADOW = &H80000010         ' Edge shading on command buttons.
  90. Global Const GRAY_TEXT = &H80000011             ' Grayed (disabled) text.  This color is set to 0 if the current display driver does not support a solid gray color.
  91. Global Const BUTTON_TEXT = &H80000012           ' Text on push buttons.
  92.  
  93. ' BorderStyle (form, label, picture box, text box)
  94. 'Global Const NONE = 0                  ' 0 - None
  95. Global Const FIXED_SINGLE = 1          ' 1 - Fixed Single
  96.  
  97. ' MousePointer (form, controls)
  98. Global Const DEFAULT = 0               ' 0 - Default
  99. Global Const ARROW = 1                 ' 1 - Arrow
  100. Global Const CROSSHAIR = 2             ' 2 - Cross
  101. Global Const IBEAM = 3                 ' 3 - I-Beam
  102. Global Const ICON_POINTER = 4          ' 4 - Icon
  103. Global Const SIZE_POINTER = 5          ' 5 - Size
  104. Global Const SIZE_NE_SW = 6            ' 6 - Size NE SW
  105. Global Const SIZE_N_S = 7              ' 7 - Size N S
  106. Global Const SIZE_NW_SE = 8            ' 8 - Size NW SE
  107. Global Const SIZE_W_E = 9              ' 9 - Size W E
  108. Global Const UP_ARROW = 10             ' 10 - Up Arrow
  109. Global Const HOURGLASS = 11            ' 11 - Hourglass
  110. Global Const NO_DROP = 12              ' 12 - No drop
  111.  
  112.  
  113. ' ScrollBar (text box)
  114. ' Global Const NONE = 0                ' 0 - None
  115. Global Const HORIZONTAL = 1            ' 1 - Horizontal
  116. Global Const VERTICAL = 2              ' 2 - Vertical
  117. Global Const BOTH = 3                  ' 3 - Both
  118.  
  119. ' Value (check box)
  120. Global Const UNCHECKED = 0             ' 0 - Unchecked
  121. Global Const CHECKED = 1               ' 1 - Checked
  122. Global Const GRAYED = 2                ' 2 - Grayed
  123.  
  124. ' WindowState (form)
  125. Global Const NORMAL = 0                ' 0 - Normal
  126. Global Const MINIMIZED = 1             ' 1 - Minimized
  127. Global Const MAXIMIZED = 2             ' 2 - Maximized
  128. '-----------------------------------
  129. 'Common Dialog Control
  130. '-----------------------------------
  131. 'Action Property
  132. Global Const DLG_FILE_OPEN = 1
  133. Global Const DLG_FILE_SAVE = 2
  134. Global Const DLG_COLOR = 3
  135. Global Const DLG_FONT = 4
  136. Global Const DLG_PRINT = 5
  137. Global Const DLG_HELP = 6
  138.  
  139. 'File Open/Save Dialog Flags
  140. Global Const OFN_READONLY = &H1&
  141. Global Const OFN_OVERWRITEPROMPT = &H2&
  142. Global Const OFN_HIDEREADONLY = &H4&
  143. Global Const OFN_NOCHANGEDIR = &H8&
  144. Global Const OFN_SHOWHELP = &H10&
  145. Global Const OFN_NOVALIDATE = &H100&
  146. Global Const OFN_ALLOWMULTISELECT = &H200&
  147. Global Const OFN_EXTENTIONDIFFERENT = &H400&
  148. Global Const OFN_PATHMUSTEXIST = &H800&
  149. Global Const OFN_FILEMUSTEXIST = &H1000&
  150. Global Const OFN_CREATEPROMPT = &H2000&
  151. Global Const OFN_SHAREAWARE = &H4000&
  152. Global Const OFN_NOREADONLYRETURN = &H8000&
  153.  
  154. 'Color Dialog Flags
  155. Global Const CC_RGBINIT = &H1&
  156. Global Const CC_FULLOPEN = &H2&
  157. Global Const CC_PREVENTFULLOPEN = &H4&
  158. Global Const CC_SHOWHELP = &H8&
  159.  
  160. 'Fonts Dialog Flags
  161. Global Const CF_SCREENFONTS = &H1&
  162. Global Const CF_PRINTERFONTS = &H2&
  163. Global Const CF_BOTH = &H3&
  164. Global Const CF_SHOWHELP = &H4&
  165. Global Const CF_INITTOLOGFONTSTRUCT = &H40&
  166. Global Const CF_USESTYLE = &H80&
  167. Global Const CF_EFFECTS = &H100&
  168. Global Const CF_APPLY = &H200&
  169. Global Const CF_ANSIONLY = &H400&
  170. Global Const CF_NOVECTORFONTS = &H800&
  171. Global Const CF_NOSIMULATIONS = &H1000&
  172. Global Const CF_LIMITSIZE = &H2000&
  173. Global Const CF_FIXEDPITCHONLY = &H4000&
  174. Global Const CF_WYSIWYG = &H8000&  'must also have CF_SCREENFONTS & CF_PRINTERFONTS
  175. Global Const CF_FORCEFONTEXIST = &H10000
  176. Global Const CF_SCALABLEONLY = &H20000
  177. Global Const CF_TTONLY = &H40000
  178. Global Const CF_NOFACESEL = &H80000
  179. Global Const CF_NOSTYLESEL = &H100000
  180. Global Const CF_NOSIZESEL = &H200000
  181.  
  182. 'Printer Dialog Flags
  183. Global Const PD_ALLPAGES = &H0&
  184. Global Const PD_SELECTION = &H1&
  185. Global Const PD_PAGENUMS = &H2&
  186. Global Const PD_NOSELECTION = &H4&
  187. Global Const PD_NOPAGENUMS = &H8&
  188. Global Const PD_COLLATE = &H10&
  189. Global Const PD_PRINTTOFILE = &H20&
  190. Global Const PD_PRINTSETUP = &H40&
  191. Global Const PD_NOWARNING = &H80&
  192. Global Const PD_RETURNDC = &H100&
  193. Global Const PD_RETURNIC = &H200&
  194. Global Const PD_RETURNDEFAULT = &H400&
  195. Global Const PD_SHOWHELP = &H800&
  196. Global Const PD_USEDEVMODECOPIES = &H40000
  197. Global Const PD_DISABLEPRINTTOFILE = &H80000
  198. Global Const PD_HIDEPRINTTOFILE = &H100000
  199. '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
  200. 'Help Constants
  201. Global Const HELP_CONTEXT = &H1      'Display topic in ulTopic
  202. Global Const HELP_QUIT = &H2         'Terminate help
  203. Global Const HELP_INDEX = &H3        'Display index
  204. Global Const HELP_CONTENTS = &H3
  205. Global Const HELP_HELPONHELP = &H4   'Display help on using help
  206. Global Const HELP_SETINDEX = &H5     'Set the current Index for multi index help
  207. Global Const HELP_SETCONTENTS = &H5
  208. Global Const HELP_CONTEXTPOPUP = &H8
  209. Global Const HELP_FORCEFILE = &H9
  210. Global Const HELP_KEY = &H101        'Display topic for keyword in offabData
  211. Global Const HELP_COMMAND = &H102
  212. Global Const HELP_PARTIALKEY = &H105 'call the search engine in winhelp
  213. Global Const HELP_MULTIKEY = &H201   'Lookup keyword in alternate table and display topic
  214. Declare Function WinHelp Lib "User" (ByVal hWnd As Integer, ByVal lpHelpFile As String, ByVal wCommand As Integer, dwData As Any) As Integer
  215. Type MULTIKEYHELP
  216.     mkSize As Integer
  217.     mkKeylist As String * 1
  218.     szKeyphrase As String * 253
  219. End Type
  220. Declare Function SendMessage Lib "User" (ByVal hWnd As Integer, ByVal wMsg As Integer, ByVal wParam As Integer, lParam As Any) As Long
  221.  
  222. 'OpenFile() Structure       [added 92/09/11]
  223. Type OfStruct
  224.     cBytes As String * 1
  225.     fFixedDisk As String * 1
  226.     nErrCode As Integer
  227.     Reserved As String * 4
  228.     szPathName As String * 128
  229. End Type
  230. Declare Function OpenFile Lib "Kernel" (ByVal lpFileName As String, lpReOpenBuff As OfStruct, ByVal wStyle As Integer) As Integer
  231. '  OpenFile() Flags
  232. Global Const OF_EXIST = &H4000      'used to get date time last updated
  233.  
  234.